;------------------------------------------------------------
;
; Events file for Kyokujitsu
;
; By: DarthVeda
; June 11, 2002
; Last Change: Version .9b
; Events for July 1941 - October 1941
; Copyright (C) 2000, 2001, 2002
;
;------------------------------------------------------------

;------------------------------------------------------------
; Flags Used
;
; The following flags have been used.
;
; ***Red Army***
; - Cease-Fire Active - Flag Tech 25 (93)
; ***Chinese***
; 0 - Objective
; 1 - Wuhan Surprise already tripped
; - Nanking Captured Early - Flag Tech 1 (33)
; - Communist Base - Flag Tech 2 (36)
; - Southern Offensive - Flag Tech 4 (40)
; - Wuhan Surprise - Flag Tech 5 (41)
; ***IJA***
; 0 - Leningrad statement
; - Defeat Russia #2 - Flag Tech 3 (39)
; - Defeat Russia #1 - Flag Tech 2 (36)
; - Built IJA Conscriptor = Flag Tech 1 (33)
; ***IJN***
; 0 - Conscriptor Bonus for Army/Navy
; - Built IJN Conscriptor - Flag Tech 1 (33)
; - Have IJN Air Factory - Flag Tech 2 (39) 
;
;------------------------------------------------------------

@BEGINEVENTS

; @DEBUG

@INITFLAG

;------------------------------------------------------------
;
; Flag Events
;
; Flag managing events.
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@AND
ReceivedTechnology
receiver=Chinese
technology=41
@THEN
Flag
Continuous
who=Chinese
state=On
flag=1
@ENDIF

;------------------------------------------------------------
;
; Equalizer Events
;
; Event to keep national economy from inflating like crazy
;
;------------------------------------------------------------

@IF
Turn
turn=Every
@THEN
Changemoney
receiver=IJA
amount=-150
@ENDIF

@IF
Turn
turn=Every
@THEN
Changemoney
receiver=IJN
amount=-150
@ENDIF

;------------------------------------------------------------
;
; Negotiations Event
;
; Prevent the cowardly AI's from making peace and what not
;
;------------------------------------------------------------

@IF
Negotiation
talker=Anybody
talkertype=HumanOrComputer
listener=Anybody
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJA
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJN
@ENDIF

; No invading Russia!

@IF
CityTaken
city=AnyCity
attacker=IJA
defender=Red Army
@THEN
Text
^ Your violoation of the cease-fire with Russia has
cost you your job.  YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJA
@ENDIF

@IF
CityTaken
city=AnyCity
attacker=IJN
defender=Red Army
@THEN
Text
^ Your violoation of the cease-fire with Russia has
cost you your job.  YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJN
@ENDIF

; No attacking the Allies!

@IF
UnitKilled
unit=AnyUnit
attacker=IJA
Defender Only
defender=Allies
@THEN
Text
^ Your premature attack on the United States is unacceptable.
YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJA
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=IJN
Defender Only
defender=Allies
@THEN
Text
^ Your premature attack on the United States is unacceptable.
YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJN
@ENDIF

;------------------------------------------------------------
;
; Japanese Requesition Events
;
; The following events will allow the Japanese player to
; acquire additional units
;
;------------------------------------------------------------

;Begin IJA Infantry

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
CreateUnit
owner=IJA
unit=Nipponese
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=48
@ENDIF

; end of IJA Infantry
; Begin IJA Fighters
 
@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
CreateUnit
owner=IJA
unit=Ki-43 Oscar
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
CreateUnit
owner=IJA
unit=Ki-43 Oscar
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=52
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=58
@ENDIF

; end IJA fighters
; Begin IJA Ground Equipment

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=61
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=62
@ENDIF

; end IJA ground equipment
; Begin IJA Armored 

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
CreateUnit
owner=IJA
unit=Type 97 Tank
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=85
@ENDIF

; end IJA Armored
; Begin IJA Bombers

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=64
@ENDIF

; end IJA Bombers
; Begin IJA Attack Aircraft

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
CreateUnit
owner=IJA
unit=Ki-51 Sonia
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
CreateUnit
owner=IJA
unit=Ki-51 Sonia
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=68
@ENDIF

; end of IJA Attack Aircraft
; Being IJA Transports

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=98
@ENDIF

; end of IJA Transports
; Begin IJN Infantry

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=48
@ENDIF

; end IJN Infantry
; Begin IJN Fighter

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=58
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=52
@ENDIF

; end IJN Fighter
; Begin IJN Ground Equipment

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=61
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

; end IJN Ground Equipment
; begin IJN Bomber

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=64
@ENDIF

; end of IJN Bombers
; Begin IJN IJN Attack Aircraft

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
CreateUnit
owner=IJN
unit=D3A1 Val
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=68
@ENDIF

; end of IJN Attack Aircraft
; Begin IJN Transports

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=98
@ENDIF

; end IJN Transports
; Begin IJN Submarines

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
CreateUnit
owner=IJN
unit=C-1 Sub
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=88
@ENDIF

; end IJN Submarines
; Begin IJN Light Cruisers

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=90
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=91
@ENDIF

; end of IJN Light Cruisers
; begin IJN Destroyers

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=94
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=95
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=96
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=97
@ENDIF

;------------------------------------------------------------
; Historical Events
;
; The following events help carve history through China
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^------------------------- Briefing -------------------------
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ High command has given you the next few months to get
preparations underway for a possible war with America.  The U.S.
has demanded that we withdraw from Indochina or face a
gasoline embargo.  Since we will not budge from Indochina,
it will likely come to an embargo.
endtext
CreateUnit
owner=Allies
unit=Bunker
veteran=No
homecity=Manila
locations
75,81,0
endlocations
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ In addition, the United States has decided to place an
embargo on all scrap metal and steel exports to Japan.
endtext
CreateUnit
owner=Allies
unit=Bunker
veteran=No
homecity=None
locations
48,40,0
endlocations
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ We do not have good signs from the Dutch East Indies,
either.  It seems as if they are looking to embargo us as
well.  Without the U.S. or the D.E.I. to supply us with oil,
our efforts to subdue China will quickly falter.  This is 
unacceptable, commander.
endtext
CreateUnit
owner=Allies
unit=Bunker
veteran=No
homecity=Manila
locations
77,79,0
endlocations
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ Therefore you are to begin drafting preparations for war
with the United States and the conquest of the Dutch East
Indies.
endtext
CreateUnit
owner=Allies
unit=Bunker
veteran=No
homecity=Manila
locations
76,80,0
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^ High command is pleased to inform you that the two newest
carriers of the Japanese fleet have been completed.  Their
names are Shokaku and Zuikaku.
endtext
CreateUnit
owner=IJN
unit=Fleet Carrier
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^^---------------------- Technology Update ----------------------
^
^ Technicians are pleased to inform you that the G4M Bomber is
^ now in service with the navy.
^
^ Your existing G3M Squadrons have been upgraded with this new
^ bomber that has superior speed and firepower.
^
^^---------------------------------------------------------------
endtext
@ENDIF

;-------------------------------
;
; Wonder Effects
;
;-------------------------------

; Conscriptor randomizer

@IF
RandomTurn
denominator=12
@AND
Turn
turn=53
@THEN
Flag
who=IJN
state=On
flag=0
@ENDIF

; Naval Conscriptor
@IF
CityProduction
builder=IJN
improvement=44
@THEN
GiveTechnology
technology=33
receiver=IJN
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
Text
^The IJN has conscripted 2 Extra Marines this season!
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
Turn
turn=53
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

; Army Conscriptor
@IF
CityProduction
builder=IJA
improvement=66
@THEN
GiveTechnology
technology=33
receiver=IJA
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
Text
^The army reports recruitments are up! Two more
^Infantry units were recruited this month.
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
Turn
turn=53
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

; - Naval Air Factory

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=D3A1 Val
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=4
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

;-------------------------------
;
; Historical Events
;
; Now with not so historical events! :)
;
;-------------------------------

@IF
Turn
turn=51
@AND
ReceivedTechnology
receiver=IJA
technology=39
@THEN
JustOnce
Text
^^------------ The War in Europe -------------
^ The Germans report that they have captured
the Russian city of Leningrad.  The soldiers
guarding the city were said to be poorly
organized and led when the main thrust came.
^^--------------------------------------------
endtext
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=39
@THEN
JustOnce
Flag
Continuous
who=IJA
state=On
flag=0
@ENDIF

@IF
Turn
turn=51
@AND
CheckFlag
who=IJA
flag=0
State=Off
@THEN
JustOnce
Text
^^------------ The War in Europe -------------
^ The Germans begrudgingly report that they
have not been able to take Leningrad or
Moscow due to the tenacious defences set
up by one General Zhukov.
^^--------------------------------------------
endtext
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=36
@AND
ReceivedTechnology
receiver=IJA
technology=39
@THEN
JustOnce
Text
^^------------ The War in Europe -------------
^ Sorge, reporting to Stalin, has stated that
he can give no firm word on whether the
Japanese will keep their non-agression pact
with Russia.  In response, Stalin is forced
to keep the bulk of Siberian troops in place.
^^--------------------------------------------
endtext
@ENDIF

@IF
Turn
turn=50
@THEN
Text
^ The United States has announced an embargo on
gasoline exportation to Japan.  Commander, this
will not affect us for another three months, at
least.
endtext
@ENDIF

@IF
Turn
turn=50
@THEN
Text
^ The U.S. has rejected the Nomura proposal to
end the stand-off over Indochina.  This means that
a diplomatic solution to the crisis is probably not
forthcoming.  High command has directed to double your
war preparation plans.
endtext
@ENDIF

@IF
Turn
turn=51
@THEN
Text
^ The Navy has seized over 490,000 tons of shipping in
accordance with wartime preparation plans.  The spoils
of the seizure will go to the army and the navy.  Each
branch has received 25 new transports.
endtext
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJA
unit=Transport
Count=5
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJA
unit=Transport
Count=5
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJA
unit=Transport
Count=5
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJA
unit=Transport
Count=5
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJA
unit=Transport
Count=5
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=5
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=5
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=5
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=5
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=5
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
Text
^ In addition, the Navy's Air Force at home and abroad
has been strengthened by high command.  In total, 4 new
A5M squadrons, 4 A6M2, 1 D3A1, 2 B5N2, and 2 G4M bombers
are now stationed throughout the empire.
endtext
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
Count=2
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
Count=2
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
Count=2
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
Count=2
veteran=No
homecity=None
locations
63,75,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=None
locations
47,117,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=None
locations
80,104,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
veteran=No
homecity=None
locations
47,117,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
Count=2
veteran=No
homecity=None
locations
15,117,1
endlocations
@ENDIF

@IF
Turn
turn=51
@THEN
CreateUnit
owner=IJN
unit=D3A1 Val
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
Text
^ The navy has drafted plans for war in the
Pacific.  An air attack on Pearl Harbor is
on the Agenda.  Commander, you should set
your carriers to sail to Peral Harbor immediately.
endtext
CreateUnit
owner=IJN
unit=Map Revealer
veteran=No
homecity=None
locations
96,120,3
endlocations
@ENDIF

; - Reinforce the South Pacific

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
20,100,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
63,139,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
46,124,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
42,112,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
35,115,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
53,99,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
34,102,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
46,124,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
50,122,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=None
locations
63,119,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Dutch Infantry
Count=3
veteran=No
homecity=None
locations
58,140,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=French Infantry
Count=3
veteran=No
homecity=None
locations
18,168,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Leathernecks
veteran=No
homecity=None
locations
82,76,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
veteran=No
homecity=None
locations
82,76,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=3
veteran=No
homecity=None
locations
74,104,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=3
veteran=No
homecity=None
locations
76,106,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=3
veteran=No
homecity=None
locations
75,95,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
veteran=No
homecity=None
locations
74,98,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
veteran=No
homecity=None
locations
75,101,0
endlocations
@ENDIF

; - Drop the Navy in Pearl Harbor

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Battleship CB
Count=2
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Battleship BB
Count=5
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Battleship BB
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Cruiser CA
Count=3
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Cruiser CL
Count=4
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=5
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=5
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=5
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
veteran=No
homecity=None
locations
95,121,3
endlocations
@ENDIF

; - Drop the Navy in Manila

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Cruiser CA
Count=2
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Cruiser CL
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=5
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=5
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=2
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

; Reinforce the West Coast

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=2
veteran=No
homecity=None
locations
72,108,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=2
veteran=No
homecity=None
locations
75,111,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=G.I.
Count=2
veteran=No
homecity=None
locations
65,95,3
endlocations
@ENDIF

@IF
Turn
turn=52
@THEN
CreateUnit
owner=Allies
unit=M4A2 Sherman Tank
Count=2
veteran=No
homecity=None
locations
64,74,3
endlocations
@ENDIF

;-------------------------------
;
; Regular Chinese Army Movements
;
;-------------------------------

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
42,22,1
40,26,1
45,25,1
43,33,1
43,29,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
43,29,1
43,33,1
45,25,1
40,26,1
42,22,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=1
veteran=Yes
homecity=None
Randomize
locations
51,21,1
46,32,1
37,37,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=4
veteran=Yes
homecity=None
Randomize
locations
30,16,1
34,16,1
29,23,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
35,15,1
38,16,1
26,18,1
32,20,1
endlocations
@ENDIF

; The next two events control guerillas between Loyang and Wuhan

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
veteran=No
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=3.7 in. Flak
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Artillery
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Artillery
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=4
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
Defender Only
defender=Chinese
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
11,55,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
defender=Chinese
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
10,54,12,54,12,56,10,56
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
32,20
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
31,19,33,19,33,21,31,21
moveto
25,41
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
3,49,1
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
2,40,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
endlocations
@ENDIF

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
0,40,10,40,10,54,0,54
moveto
30,48
numbertomove=All
@ENDIF

; The following events control the regular army moving from Changsha

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=1
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

;-------------------------------
;
; - Wuhan Surprise
;
;-------------------------------

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@THEN
GiveTechnology
technology=41
receiver=Chinese
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF


;-------------------------------
;
; - Southern Defense Force
;
;-------------------------------


@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
Count=2
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
veteran=Yes
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,36,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
85,29,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
73,37,75,37,75,39,73,39
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
95,41,97,41,97,43,95,43
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Chinese Irregulars
Map=0
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
Randomize
locations
76,48,0
92,40,0
80,38,0
78,44,0
91,45,0
94,54,0
83,43,0
endlocations
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

;------------------------------------------------------------
;
; Objective Area
;
; This rewards the player for meeting various objectives.
;
;------------------------------------------------------------

;------------------------------------------------------------
;
; File Change Statement
;
; The part of the program where we make the User work for
; their enjoyment :)
;
;------------------------------------------------------------

@IF
Turn
turn=53
@THEN
Text
^ Commander, your attack on Pearl Harbor is crucial to our
effort in the Pacific.  This mission must succeed for us to
gain the advantage in this war.  The fate of the empire lays
in the coming months.
endtext
@ENDIF

@IF
Turn
turn=53
@THEN
Text
^You are ready to play part 14 of Kyokujitsu!
endtext
@ENDIF

@ENDEVENTS